﻿Imports PTIC_Util
Imports System.Windows.Forms
Imports PTIC_GestionBDD
Imports System.Collections.Generic
Imports System.Collections.ObjectModel
Imports System.Collections.Specialized
Imports System.ComponentModel
Imports System.Diagnostics
Imports System.Windows.Data
Imports System.Windows.Input
Imports OMANE.Common.UI

Namespace ViewModels
    Public Class ViewModelSegMutualisation
        Inherits ViewModelCommand
        Implements IViewModelTabSection

        Private m_model As ModelTauxGarantis

        Public Property Icone As String Implements Common.UI.IViewModelTabSection.Icone
        Public Property Title As String Implements Common.UI.IViewModelTabSection.Title
        Public Property IsClosable As Boolean Implements IViewModelTabSection.IsClosable

        Public Sub New(ByVal Model As ModelTauxGarantis, ByVal DisplayName As String, ByVal Command As ICommand)
            MyBase.New(DisplayName, Command)
            m_model = Model
        End Sub
        Public Sub New()
            Title = "MUTUALISATION"
        End Sub
    End Class
End Namespace
